home *** CD-ROM | disk | FTP | other *** search
/ The Fatted Calf / The Fatted Calf.iso / Applications / Games / Solitaire / Sources / Pyramid / DiscardCardPileDelegate.m < prev    next >
Text File  |  1994-01-11  |  2KB  |  62 lines
  1. /* indent:4  tabsize:8  font:fixed-width */
  2.  
  3. #import "DiscardCardPileDelegate.h"
  4. #import "../Solitaire/CardSet.subproj/cardset.h"
  5. #import "Pyramid.h"
  6.  
  7.  
  8. @implementation DiscardCardPileDelegate
  9.  
  10. /*-------------------------------------------------------------------------
  11. |
  12. |    - (BOOL)canAcceptPile:aCardPile from:sender in:discardCardPileView
  13. |
  14. |    returns:    (BOOL)    YES if this pile will accept the cards dropped on it
  15. |
  16. |        (BOOL)    NO if this pile will not accept the dropped cards
  17. |
  18. |--------------------------------------------------------------------------
  19. |
  20. |    Called by a DiscardCardPileView when a card pile wants to be dropped 
  21. |    on this it.
  22. |    
  23. \-------------------------------------------------------------------------*/
  24.  
  25. - (BOOL)canAcceptPile:aCardPile from:sender in:discardCardPileView
  26. {
  27.  
  28.     /*---------------------------------------------------------------------
  29.      *
  30.      * Only Kings may be dropped directly on the match piles.
  31.      *
  32.      *--------------------------------------------------------------------*/
  33.     
  34.     if ([[aCardPile cardAt:CS_TOP] value] == CS_KING)
  35.     {
  36.     return YES;
  37.     }
  38.     return NO;
  39. }
  40.  
  41.  
  42. /*--------------------------------------------------------------------------
  43. |
  44. |    - acceptPile:aCardPile in:discardCardPileView
  45. |
  46. |    returns:        (id)            self
  47. |
  48. |---------------------------------------------------------------------------
  49. |
  50. |    Called by a discardCardPileView when a card pile has been dropped on 
  51. |    the pile.
  52. |    
  53. \---------------------------------------------------------------------------*/
  54.  
  55. - acceptPile:aCardPile in:discardCardPileView
  56. {
  57.     [SolGameController() checkForWin];
  58.     return self;
  59. }
  60.  
  61. @end
  62.